home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d2
/
prompt.arc
/
PROMPTS.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-02-18
|
3KB
|
101 lines
@echo off
:menu
ECHO ╔═══════════════════════════════════════╗
ECHO ║ Pick Your Prompt ║██
ECHO ║ ║██
ECHO ║ 1 - Bart 6 - Birthday ║██
ecHO ║ ║██
ECHO ║ 2 - Computer 7 - Christmas ║██
ECHO ║ ║██
ECHO ║ 3 - IBM 8 - Halloween ║██
ECHO ║ ║██
ECHO ║ 4 - Plane 9 - Computer2 ║██
ECHO ║ ║██
ECHO ║ 5 - Train W - Windows ║██
echo ║ ║██
ECHO ║ Q - Quit and Save Prompt ║██
ECHO ╚═══════════════════════════════════════╝██
ECHO █████████████████████████████████████████
rem goto end
:wait
key 123456789WQ
goto wait
if errorlevel 1 goto bart
if errorlevel 2 goto comp
if errorlevel 3 goto ibm
if errorlevel 4 goto plane
if errorlevel 5 goto train
if errorlevel 6 goto birth
if errorlevel 7 goto xmas
if errorlevel 8 goto boo
if errorlevel 9 goto comp2
if errorlevel 10 goto win
if errorlevel 11 goto end
:bart
prompt=$e[1;33m│\/\/\/│$_│$e[6C│$_│ $e[;1;36m0 0$e[;1;33m)$_C$e[6C_)$_ │ $e[;31m,__$e[1;33m│ Command me, dude!$_ │ / $e[m_
cls
goto menu
:comp
prompt=$e[37;44mP ╔═══╗ $_O ║$e[31;46m▐$e[33;46m▐$e[36;46m▐$e[37;44m║ $_W ╚▀▀▀╝$_E╔═══════╗ $_R╚═ USER ╚═$e[36m$g$p$g
cls
goto menu
rem :date & time
prompt $e[1m$_$D$H$H$H$H$H$_$t$H$H$H$h$H$H$_$e[0m$P$G$
cls
goto menu
:PLANE
prompt $e[8C_│_$_══╦══╦══$e[5;31m*$e[0;33m⌠$e[31;5m*$e[0m══╦══╦══$_══╩══╩══\°/══╩══╩══$_$e[7C╟-$e[0;33m¬$e[0m-╢$e[0m
cls
goto menu
:TRAIN
prompt $e[44;37;5m$e[16C$e[0;44;1;31m$_███$e[36m███$e[33m███$e[35m███▄▌$_$e[32;1m° ° ° ° ° ° ° °$e[0;1;44;37m$e[1A$p$g
cls
goto menu
:birth
prompt $e[5;33;40m $_$e[0m$e[1;37m ▌▌▌▌▌▌$_$e[33m ▒▒▒▒▒▒▒▒$_ ▒▒▒▒▒▒▒▒$_$_$d$_$e[35mHAPPY BIRTHDAY! $e[36m$p$g
cls
goto menu
:XMAS
prompt $e[1;5;37m *$_$e[0;32;40m █$_ $e[1;31;42m ⌡ $_$e[33;42m ° o $e[34;40m$e[K$_ ▀$_$e[31m MERRY$_CHRISTMAS!$_$_$E[37M$p$g
CLS
goto menu
:BOO
PROMPT $e[1;32;40m ┌$_$e[33;43m $e[40m$e[K$_$e[43m $_ ▀▀ $e[37;40m$e[K$_ BOO!$_$_$e[35m $p$g$e[37m
cls
goto menu
:comp2
prompt $e[2C╔════╗$_$e[2C║$e[1;31;42mHELP$e[0m║$_$e[2C╚════╝$_ ▀▀▀▀$_$e[1;31;47m ▀ $e[0m$e[32;47m▀▀ $e[30m╠═╣ $e[0m $p$g
cls
goto menu
:WIN
prompt $e[44;37m Windows $e[1B$e[9D█████████$e[1B$e[9D██████$e[41m Sucks $e[1B$e[9D█████████$e[1B$e[9D█████████$e[40m $p$g
cls
goto menu
:IBM
prompt=$e[1;34m▀▀▀ ▀▀▀▀▀▄ ▀▀▀ ▀▀▀ (TM)$_ ▀ ▀▀▀▀ ▀ ▀ ▀ ▀ $_ ▀ ▀▀▀▀▄ ▀ ▀ ▀$_▀▀▀ ▀▀▀▀▀ ▀▀ ▀▀$e[0m$_$D$_$_$P$G
cls
goto menu
:end